home *** CD-ROM | disk | FTP | other *** search
/ ROM Magic / ROM Magic.iso / pc / data_07 / part1.dir / 00002_Picture2.ls < prev    next >
Encoding:
Text File  |  1995-05-11  |  380 b   |  17 lines
  1. on mouseUp
  2.   global frag, myv, myho, myw, myhi, myl, myt
  3.   if frag = 0 then
  4.     set myv to the mouseV
  5.     set myho to the mouseH
  6.     set myl to the left of sprite 17
  7.     set myr to the right of sprite 17
  8.     set myw to myr - myl
  9.     set myt to the top of sprite 17
  10.     set myb to the bottom of sprite 17
  11.     set myhi to myb - myt
  12.     enlargement()
  13.   else
  14.     small()
  15.   end if
  16. end
  17.